home *** CD-ROM | disk | FTP | other *** search
/ Aminet 8 / Aminet 8 (1995)(GTI - Schatztruhe)[!][Oct 1995].iso / Aminet / dev / gcc / gcc270_src.lha / gcc-2.7.0-amiga / config / i386 / next.h < prev    next >
C/C++ Source or Header  |  1995-06-15  |  7KB  |  227 lines
  1. /* Target definitions for GNU compiler for Intel x86 CPU running NeXTSTEP
  2.    Copyright (C) 1993, 1995 Free Software Foundation, Inc.
  3.  
  4. This file is part of GNU CC.
  5.  
  6. GNU CC is free software; you can redistribute it and/or modify
  7. it under the terms of the GNU General Public License as published by
  8. the Free Software Foundation; either version 2, or (at your option)
  9. any later version.
  10.  
  11. GNU CC is distributed in the hope that it will be useful,
  12. but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14. GNU General Public License for more details.
  15.  
  16. You should have received a copy of the GNU General Public License
  17. along with GNU CC; see the file COPYING.  If not, write to
  18. the Free Software Foundation, 59 Temple Place - Suite 330,
  19. Boston, MA 02111-1307, USA.  */
  20.  
  21. #include "i386/gas.h"
  22. #include "nextstep.h"
  23.  
  24. /* By default, target has a 80387, with IEEE FP.  */
  25.  
  26. #undef    TARGET_DEFAULT
  27. #define TARGET_DEFAULT  (1|0100)
  28.  
  29. /* Implicit library calls should use memcpy, not bcopy, etc.  */
  30.  
  31. #define TARGET_MEM_FUNCTIONS
  32.  
  33. /* Machines that use the AT&T assembler syntax
  34.    also return floating point values in an FP register.
  35.    Define how to find the value returned by a function.
  36.    VALTYPE is the data type of the value (as a tree).
  37.    If the precise function being called is known, FUNC is its FUNCTION_DECL;
  38.    otherwise, FUNC is 0.  */
  39.  
  40. #undef    VALUE_REGNO
  41. #define VALUE_REGNO(MODE) \
  42.   ((MODE) == SFmode || (MODE) == DFmode || (MODE) == XFmode    \
  43.    ? FIRST_FLOAT_REG : 0)
  44.  
  45. /* 1 if N is a possible register number for a function value. */
  46.  
  47. #undef    FUNCTION_VALUE_REGNO_P
  48. #define FUNCTION_VALUE_REGNO_P(N) ((N) == 0 || (N)== FIRST_FLOAT_REG)
  49.  
  50. #ifdef REAL_VALUE_TO_TARGET_LONG_DOUBLE
  51. #undef    ASM_OUTPUT_LONG_DOUBLE
  52. #define ASM_OUTPUT_LONG_DOUBLE(FILE,VALUE)                \
  53.   do {                                    \
  54.     long hex[3];                            \
  55.     REAL_VALUE_TO_TARGET_LONG_DOUBLE (VALUE, hex);            \
  56.     if (sizeof (int) == sizeof (long))                    \
  57.       fprintf (FILE, "\t.long 0x%x\n\t.long 0x%x\n\t.long 0x%x\n",    \
  58.         hex[0], hex[1], hex[2]);                \
  59.     else                                \
  60.       fprintf (FILE, "\t.long 0x%lx\n\t.long 0x%lx\n\t.long 0x%lx\n",    \
  61.         hex[0], hex[1], hex[2]);                \
  62.   } while (0)
  63. #endif
  64.  
  65. #ifdef REAL_VALUE_TO_TARGET_DOUBLE
  66. #undef    ASM_OUTPUT_DOUBLE
  67. #define ASM_OUTPUT_DOUBLE(FILE,VALUE)                    \
  68.   do {                                    \
  69.     long hex[2];                            \
  70.     REAL_VALUE_TO_TARGET_DOUBLE (VALUE, hex);                \
  71.     if (sizeof (int) == sizeof (long))                    \
  72.       fprintf (FILE, "\t.long 0x%x\n\t.long 0x%x\n", hex[0], hex[1]);    \
  73.     else                                \
  74.       fprintf (FILE, "\t.long 0x%lx\n\t.long 0x%lx\n", hex[0], hex[1]);    \
  75.   } while (0)
  76. #endif
  77.  
  78. /* This is how to output an assembler line defining a `float' constant.  */
  79.  
  80. #ifdef REAL_VALUE_TO_TARGET_SINGLE
  81. #undef    ASM_OUTPUT_FLOAT
  82. #define ASM_OUTPUT_FLOAT(FILE,VALUE)                    \
  83.   do {                                    \
  84.     long hex;                                \
  85.     REAL_VALUE_TO_TARGET_SINGLE (VALUE, hex);                \
  86.     if (sizeof (int) == sizeof (long))                    \
  87.       fprintf (FILE, "\t.long 0x%x\n", hex);                \
  88.     else                                \
  89.       fprintf (FILE, "\t.long 0x%lx\n", hex);                \
  90.   } while (0)
  91. #endif
  92.  
  93. /* A C statement or statements which output an assembler instruction
  94.    opcode to the stdio stream STREAM.  The macro-operand PTR is a
  95.    variable of type `char *' which points to the opcode name in its
  96.    "internal" form--the form that is written in the machine description.
  97.  
  98.    GAS version 1.38.1 doesn't understand the `repz' opcode mnemonic.
  99.    So use `repe' instead.  */
  100.  
  101. #undef    ASM_OUTPUT_OPCODE
  102. #define ASM_OUTPUT_OPCODE(STREAM, PTR)    \
  103. {                            \
  104.   if ((PTR)[0] == 'r'                    \
  105.       && (PTR)[1] == 'e'                \
  106.       && (PTR)[2] == 'p')                \
  107.     {                            \
  108.       if ((PTR)[3] == 'z')                \
  109.     {                        \
  110.       fprintf (STREAM, "repe");            \
  111.       (PTR) += 4;                    \
  112.     }                        \
  113.       else if ((PTR)[3] == 'n' && (PTR)[4] == 'z')    \
  114.     {                        \
  115.       fprintf (STREAM, "repne");            \
  116.       (PTR) += 5;                    \
  117.     }                        \
  118.     }                            \
  119. }
  120.  
  121. /* Define macro used to output shift-double opcodes when the shift
  122.    count is in %cl.  Some assemblers require %cl as an argument;
  123.    some don't.
  124.  
  125.    GAS requires the %cl argument, so override unx386.h. */
  126.  
  127. #undef    AS3_SHIFT_DOUBLE
  128. #define AS3_SHIFT_DOUBLE(a,b,c,d) AS3 (a,b,c,d)
  129.  
  130. /* Print opcodes the way that GAS expects them. */
  131. #define GAS_MNEMONICS 1
  132.  
  133. /* Names to predefine in the preprocessor for this target machine.  */
  134.  
  135. #undef    CPP_PREDEFINES
  136. #define CPP_PREDEFINES "-Di386 -DNeXT -Dunix -D__MACH__ -D__LITTLE_ENDIAN__ -D__ARCHITECTURE__=\"i386\" -Asystem(unix) -Asystem(mach) -Acpu(i386) -Amachine(i386)"
  137.  
  138. /* This accounts for the return pc and saved fp on the i386. */
  139.  
  140. #define OBJC_FORWARDING_STACK_OFFSET 8
  141. #define OBJC_FORWARDING_MIN_OFFSET 8
  142.  
  143. /* We do not want a dot in internal labels.  */
  144.  
  145. #undef LPREFIX
  146. #define LPREFIX "L"
  147.  
  148. #undef    ASM_GENERATE_INTERNAL_LABEL
  149. #define ASM_GENERATE_INTERNAL_LABEL(BUF,PREFIX,NUMBER)    \
  150.     sprintf ((BUF), "*%s%d", (PREFIX), (NUMBER))
  151.  
  152. #undef ASM_OUTPUT_INTERNAL_LABEL
  153. #define ASM_OUTPUT_INTERNAL_LABEL(FILE,PREFIX,NUM)    \
  154.   fprintf (FILE, "%s%d:\n", PREFIX, NUM)
  155.  
  156. /* Output to assembler file text saying following lines
  157.    may contain character constants, extra white space, comments, etc.  */
  158.  
  159. #undef    ASM_APP_ON
  160. #define ASM_APP_ON "#APP\n"
  161.  
  162. /* Output to assembler file text saying following lines
  163.    no longer contain unusual constructs.  */
  164.  
  165. #undef    ASM_APP_OFF
  166. #define ASM_APP_OFF "#NO_APP\n"
  167.  
  168. #undef    ASM_OUTPUT_REG_PUSH
  169. #define ASM_OUTPUT_REG_PUSH(FILE,REGNO)  \
  170.   fprintf (FILE, "\tpushl %se%s\n", "%", reg_names[REGNO])
  171.  
  172. #undef    ASM_OUTPUT_REG_POP
  173. #define ASM_OUTPUT_REG_POP(FILE,REGNO)  \
  174.   fprintf (FILE, "\tpopl %se%s\n", "%", reg_names[REGNO])
  175.  
  176. /* This is being overridden because the default i386 configuration
  177.    generates calls to "_mcount".  NeXT system libraries all use
  178.    "mcount".  */
  179.  
  180. #undef    FUNCTION_PROFILER
  181. #define FUNCTION_PROFILER(FILE, LABELNO)                \
  182. {                                    \
  183.   if (flag_pic)                                \
  184.     {                                    \
  185.       fprintf (FILE, "\tleal %sP%d@GOTOFF(%%ebx),%%edx\n",        \
  186.                LPREFIX, (LABELNO));                    \
  187.       fprintf (FILE, "\tcall *mcount@GOT(%%ebx)\n");            \
  188.     }                                    \
  189.   else                                    \
  190.     {                                      \
  191.       fprintf (FILE, "\tmovl $%sP%d,%%edx\n", LPREFIX, (LABELNO));    \
  192.       fprintf (FILE, "\tcall mcount\n");                \
  193.     }                                    \
  194. }
  195.  
  196. /* BEGIN Calling Convention CHANGES */
  197.  
  198. /* These changes violate the Intel/Unix ABI.  Specifically, they
  199.    change the way that space for a block return value is passed to a
  200.    function.  The ABI says that the pointer is passed on the stack.
  201.    We change to pass the pointer in %ebx.  This makes the NeXT
  202.    Objective-C forwarding mechanism possible to implement on an i386.  */
  203.  
  204. /* Do NOT pass address of structure values on the stack.  */
  205.  
  206. #undef    STRUCT_VALUE_INCOMING
  207. #undef    STRUCT_VALUE
  208.  
  209. /* Pass them in %ebx.  */
  210.  
  211. #undef    STRUCT_VALUE_REGNUM
  212. #define STRUCT_VALUE_REGNUM 3
  213.  
  214. /* Because we are passing the pointer in a register, we don't need to
  215.    rely on the callee to pop it.  */
  216.  
  217. #undef    RETURN_POPS_ARGS
  218. #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE)                 \
  219.   (TREE_CODE (FUNTYPE) == IDENTIFIER_NODE            \
  220.    ? 0                                \
  221.    : (TARGET_RTD                        \
  222.       && (TYPE_ARG_TYPES (FUNTYPE) == 0                \
  223.           || (TREE_VALUE (tree_last (TYPE_ARG_TYPES (FUNTYPE)))    \
  224.               == void_type_node))) ? (SIZE) : 0)
  225.  
  226. /* END Calling Convention CHANGES */
  227.